home *** CD-ROM | disk | FTP | other *** search
/ Mac Power 1997 January / macpower199701.bin / AMUG / Publishing_19 / Alpha 6.5.sit / Tcl / SystemCode / keyBindings.tcl < prev    next >
Encoding:
Text File  |  1996-08-15  |  3.0 KB  |  125 lines  |  [TEXT/ALFA]
  1.  
  2. bind Left  backwardChar
  3. bind Left <c> beginningOfLine
  4. bind Left <s> backwardCharSelect
  5. bind Left <sc> beginningLineSelect
  6. bind Left <z> {scrollLeftCol 15}
  7. bind Left <o> backwardWord
  8. bind Left <os> backwardWordSelect
  9.  
  10. bind Right  forwardChar
  11. bind Right <c> endOfLine
  12. bind Right <s> forwardCharSelect
  13. bind Right <sc> endLineSelect
  14. bind Right <z> {scrollRightCol 15}
  15. bind Right <o> forwardWord
  16. bind Right <os> forwardWordSelect
  17.  
  18. bind Up  previousLine
  19. bind Up <s> prevLineSelect
  20. bind Up <c> beginningOfBuffer
  21. bind Up <sc> beginningBufferSelect
  22. bind Up <z> scrollUpLine
  23. bind Up <o> scrollUpLine
  24.  
  25. bind Down  nextLine
  26. bind Down <c> endOfBuffer
  27. bind Down <s> nextLineSelect
  28. bind Down <sc> endBufferSelect
  29. bind Down <z> scrollDownLine
  30. bind Down <o> scrollDownLine
  31.  
  32. # Keypad definitions
  33. bind KPad4  backwardWord                 
  34. bind KPad4   <c> backwardDeleteWord 
  35. bind KPad6   forwardWord                 
  36. bind KPad6   <c> deleteWord 
  37. bind Clear   toggleNumLock
  38. # Never bind Keypad /
  39. # Never bind Keypad *
  40. bind KPad0   nextWindow
  41. bind KPad0 <s>   prevWindow
  42. bind KPad+   nextWindow
  43. bind KPad-   prevWindow
  44. bind KPad0    pageBack
  45. # bind Enter   pageForward
  46. bind Enter    briefThing
  47. ;bind KPad3   repeatSearchForward         
  48. ;bind KPad1   repeatSearchBackward     
  49. bind Kpad1 prevFunc
  50. bind Kpad3 nextFunc
  51. bind KPad.   endOfBuffer                 
  52. bind KPad5   exchangePointAndMark     
  53. bind KPad7   backwardDeleteWord         
  54. bind KPad9   deleteWord                 
  55. # bind 's' <z>     isearch            
  56. # bind 'r' <z>     rsearch            
  57. bind 't' <z>     insertToTop        
  58. bind 'z' <z>     pageBack
  59. bind "' '" <z>     setMark
  60. bind '1' <z>    execAbbrev
  61.  
  62. # bind F1         iconify                     
  63. # #bind  <c> F1     wordCompletion 
  64. # bind F2         cut                         
  65. # bind F3         copy                         
  66. # bind F4         yank                         
  67. # #bind F5         prevWindow
  68. # #bind F6        nextWindow
  69. # bind F7            tiled
  70. # bind F8            swapWithNext
  71. # bind F9         pushMark
  72. # bind F11        shrinkHigh
  73. # bind F12        shrinkLow
  74. # #bind F13        startKeyboardMacro         
  75. # #bind F14        endKeyboardMacro             
  76. # #bind F15        executeKeyboardMacro         
  77.  
  78. bind Del        deleteChar                 
  79. bind Help       alphaHelp                     
  80. bind Home       beginningOfBuffer             
  81. bind End        endOfBuffer                 
  82. bind Pgup       pageBack                     
  83. bind Pgdn       pageForward                  
  84.  
  85. # Another control prefix.
  86. bind 'q' <z>     prefixChar
  87. bind 't' <Q>    shrinkHigh
  88. bind 'b' <Q>    shrinkLow
  89. bind 'l' <Q>    shrinkLeft
  90. bind 'r' <Q>    shrinkRight
  91. bind 'c' <Q>    chooseAWindow
  92. bind 'h' <Q>    winhorizontally
  93. bind 'i' <Q>    iconify
  94. bind 'n' <Q>    nextWindow
  95. bind 'o' <Q>    bufferOtherWindow
  96. bind 'p' <Q>    prevWindow
  97. bind 's' <Q>    swapWithNext
  98. bind 'a' <Q>    wintiled
  99. bind 'v' <Q>    winvertically
  100. bind 'f' <Q>    shrinkFull
  101. bind '2' <Q>    splitWindow
  102.  
  103. bind ' ' <o>    oneSpace
  104. bind 'l' <c>    load
  105.  
  106. #bind 'w' <zs>    rectMarkHilite
  107. bind '¥r'        carriageReturn
  108. bind '¥t'         tclFileCompletion "Shel"
  109. ascii 0x1b        startEscape
  110. ascii 0x8        backSpace
  111. bind '¥t' <z>     doATab Tcl
  112. bind '¥t' <z>     doATab C
  113. bind '¥t' <z>     doATab C++
  114. #bind 's' <zoc>    spacesToTabs
  115. #bind 't' <zoc>    tabsToSpaces
  116. # bind 'a' <zo>    insertAscii
  117. # bind 'a' <zos>    getAscii
  118. bind 'f' <cz>     freeMem
  119. # bind 't' <e>     findTag 
  120. bind 'm' <X>    matchingLines 
  121.  
  122.  
  123. # <ctrl>-` bound to 'wordCompletion'
  124. bind 0x32 <z> wordCompletion
  125.